home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / ptv1n4.arc / L3.ASM < prev    next >
Assembly Source File  |  1990-09-13  |  271b  |  12 lines

  1.  
  2.  
  3.      SHL  BX,1                ;prepare for word sized look up
  4.      OR   AX,ShiftTable[BX]   ;look up the bit and OR it in
  5.           :
  6. ShiftTable     LABEL     WORD
  7. BIT_PATTERN=0001H
  8.      REPT 16
  9.      DW   BIT_PATTERN
  10. BIT_PATTERN=BIT_PATTERN SHL 1
  11.      ENDM
  12.